PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPP PPP 
PPP PPP 
PPP PPP 


PPP PPP 
PPP PPP 


PPP PPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 


tt tt ot st tt Ht 4 St St Ht Ht Ht SH Ht 

AAAs tH HS HH 

A a A A A tH tt 
AAAAAAOOOAAMAAOO 
AAQMAAAAOAOAMAAAOAO 
NOAAMAAAAAAAAAOOO 


HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 


| 
ed 


**F ILE**1D**BSTRUC 


BBBBBBBB SSSSSSSS_ TTTTTTTTTT RRRRRRRR UU UU .-cccccc 
BBBBBBBB SSSSSSSS_ TTTTTTTTTT RRRRRRRR UU UU cecceccce 
BB BB SS TT RR RR UU uu CC 
BB BB SS TT RR RR UU uu CC 
BB BB SS TT RR RR UU uu CC 
BB BB SS TT RR RR UU uu CC 
BBBBBBBB SSSSSS TT RRRRRRRR UU uu CC 
BBBBBBBB SSSSSS TT RRRRRRRR UU uu CC 
SS TT RR RR UU uu CC 
B8 BB SS TT RR RR UU UU CE 
BB BB SS TT RR RR UU UU CL eee 
BB BB SS TT RR RR UU uu CC cece 
BBBBBBBB SSSSSSSS TT RR RR = UUUUUUUUUU ccccccce eee 
BBBBBBBB SSSSSSSS TT RR RR = UUUUUUUUUU cccccccc eos 
RRRRRRRR EEEEEEEEEE QQQ00Q 
RRRRRRRR EEEEEEEEEE QQQaaa 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RRRRRRRR EEEEEEEE QQ QQ 
RRRRRRRR EEEEEEEE Q QQ 
RR RR EE QQ QQ QQ 
RR RR EE QQ QQ QQ 
RR RR EE Q QQ 
RR RR EE QQ QQ 
RR RR EEEEEEEEEE aaaa aa 
RR RR EEEEEEEEEE QQQQg aa 
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BSTRUC.REQ = BASED STRUCTURE DECLARATIONS FILE 
Version: *v04-000' 
i eee ee ee eeee eee eee eEREREReKeKReReeeeReeenkeeeeeeeeeeeeeeeeeeeeeeeeeeeeeener 


:* COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
!* ALL RIGHTS RESERVED. 


* 
® 
® 
® 
i THIS SOFTWARE 1S FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ie (EN AGCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
is INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
is COPIES. THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
i OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
ie TRANSFERRED. * 
® 
is THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
i® AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
i CORPORATION. . 
® 
*® 
*® 
® 
® 
® 


:* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
:* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 

i 
nT OT EE 
i 


OR 
a 


ERNAL ROUT INE ACCESS_CHECK: WEAK; 
ERAL NULL = 0; 


THIS MACRO IS FOR wigget 


PU on ONLY ! 
IT SHOULD BE A NO-OP UL ELY 


E 
L 
q 
NG 
MAT 
i] 
' 
6 


MACRO BS_DEBUG = 0%; 


MACRO DISPOSE (SNAME ,P) 

‘i FREERELEASE(.(P), ZNAME (X2STRING(SNAME),'_*, ‘ALLOC")); 
(P) = NULL; 

MACRO NEW(SNAME ,P) 
(P) = FREEZ(ZNAME (ZSTRING(SNAME), ‘_*, ‘ALLOC')) 


MACRO BASED1 (NAME) 
CFFIELD,OFFSET,POS,SIZE,SIGNJ 


BSTRUC .REQ; 1 


i; 


MACRO ZQUOTE XNAMECZSTRING(NAME),'_* ,2STRING(FFIELD)) (PTR) 


BLOCKE ( IF BS_DEBUG 
THEN IF (PTR) EQL NULL 
THEN $$ CHECK 
ELSE ))" 
ELSE (PTR)) 
OFFSET, POS,SIZE,SIGNI 
ZQUOTE % 


MACRO BASED_STRUCTURE (NAME ,ENTRY_SIZE) CJ 


LITERAL NAME (ZSTRING(NAME), '_*,"ALLOC') = ENTRY_SIZE ; 
BASED1 (NAME ,ZREMAINING) %; 


BSTRUC.REQ = LAST LINE 


K 
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